home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / MPW Oberon 2.1168 / Hennessy / Real Bubblesort / RealBubble.c next >
Encoding:
C/C++ Source or Header  |  1994-09-12  |  452 b   |  42 lines  |  [TEXT/MPS ]

  1. #include <stdio.h>
  2. #include <events.h>
  3.  
  4. #define  size 1500 
  5.  
  6. int arr[size], time;
  7.  
  8.  
  9. void Bubble(int *arr)
  10. {
  11.     int i,j,k;
  12.  
  13.     do
  14.     {
  15.         j=0;
  16.         for(i=0;i<size-1;i++)
  17.         {
  18.             if(arr[i]>arr[i+1])
  19.             {
  20.                 k=arr[i]; arr[i]=arr[i+1]; arr[i+1]=k; j=1;
  21.             }
  22.         }
  23.     }while(j!=0);
  24. }
  25.  
  26. void Init(int *arr)
  27. {
  28.     int i;
  29.  
  30.     for(i=0;i<size;i++)    
  31.             arr[i]=size-i;
  32. }
  33.  
  34. main()
  35. {
  36.     time=TickCount();
  37.     Init(arr); Bubble(arr);
  38.     time=TickCount()-time;
  39.     printf("\n%d",time);
  40.     return 0;
  41. }
  42.